home *** CD-ROM | disk | FTP | other *** search
/ cyber.net interactivo 3 / inter@ivo 1996-04.iso / cybint3 / bin / tmn.dxr / 00116.ls < prev    next >
Encoding:
Text File  |  1996-03-21  |  2.1 KB  |  93 lines
  1. on mouseUp
  2.   if the mouseCast = 92 then
  3.     set the visible of sprite 25 to 1
  4.     set the visible of sprite 26 to 1
  5.     set the visible of sprite 27 to 1
  6.     set the visible of sprite 28 to 1
  7.     set the visible of sprite 29 to 1
  8.     set the visible of sprite 30 to 1
  9.     go("ecr2")
  10.   end if
  11.   if the mouseCast = 108 then
  12.     go("norte")
  13.   end if
  14.   if the mouseCast = 109 then
  15.     go("Porto")
  16.   end if
  17.   if the mouseCast = 110 then
  18.     go("Centro")
  19.   end if
  20.   if the mouseCast = 111 then
  21.     go("Lis")
  22.   end if
  23.   if the mouseCast = 112 then
  24.     go("Sul")
  25.   end if
  26.   if the mouseCast = 113 then
  27.     go("Algar")
  28.   end if
  29.   if the mouseCast = 114 then
  30.     go("Mad")
  31.   end if
  32. end
  33.  
  34. on exitFrame
  35.   if rollOver(32) then
  36.     if the visible of sprite 25 = 0 then
  37.       sound playFile 3, "..\som\sector.wav"
  38.       set the visible of sprite 25 to 1
  39.     end if
  40.   else
  41.     set the visible of sprite 25 to 0
  42.   end if
  43.   if rollOver(33) then
  44.     if the visible of sprite 31 = 0 then
  45.       sound playFile 3, "..\som\sector.wav"
  46.       set the visible of sprite 31 to 1
  47.     end if
  48.   else
  49.     set the visible of sprite 31 to 0
  50.   end if
  51.   if rollOver(34) then
  52.     if the visible of sprite 26 = 0 then
  53.       sound playFile 3, "..\som\sector.wav"
  54.       set the visible of sprite 26 to 1
  55.     end if
  56.   else
  57.     set the visible of sprite 26 to 0
  58.   end if
  59.   if rollOver(35) then
  60.     if the visible of sprite 30 = 0 then
  61.       sound playFile 3, "..\som\sector.wav"
  62.       set the visible of sprite 30 to 1
  63.     end if
  64.   else
  65.     set the visible of sprite 30 to 0
  66.   end if
  67.   if rollOver(36) then
  68.     if the visible of sprite 27 = 0 then
  69.       sound playFile 3, "..\som\sector.wav"
  70.       set the visible of sprite 27 to 1
  71.     end if
  72.   else
  73.     set the visible of sprite 27 to 0
  74.   end if
  75.   if rollOver(37) then
  76.     if the visible of sprite 29 = 0 then
  77.       sound playFile 3, "..\som\sector.wav"
  78.       set the visible of sprite 29 to 1
  79.     end if
  80.   else
  81.     set the visible of sprite 29 to 0
  82.   end if
  83.   if rollOver(38) then
  84.     if the visible of sprite 28 = 0 then
  85.       sound playFile 3, "..\som\sector.wav"
  86.       set the visible of sprite 28 to 1
  87.     end if
  88.   else
  89.     set the visible of sprite 28 to 0
  90.   end if
  91.   go(the frame)
  92. end
  93.